home *** CD-ROM | disk | FTP | other *** search
/ Especial Multimedia / Especial Multimedia.iso / Multimed / Musica / ZMUD32.ZIP / ZMUD.EXE / 0 / RCDATA / TPREFERENCES / TPREFERENCES.txt
Text File  |  1997-06-09  |  60KB  |  2,221 lines

  1. object Preferences: TPreferences
  2.   Left = 169
  3.   Top = 86
  4.   HelpContext = 101
  5.   BorderStyle = bsDialog
  6.   Caption = 'Preferences'
  7.   ClientHeight = 462
  8.   ClientWidth = 584
  9.   Font.Color = clWindowText
  10.   Font.Height = -13
  11.   Font.Name = 'System'
  12.   Font.Style = []
  13.   Position = poScreenCenter
  14.   OnActivate = FormActivate
  15.   OnCreate = FormCreate
  16.   PixelsPerInch = 96
  17.   TextHeight = 16
  18.   object Version: TLabel
  19.     Left = 8
  20.     Top = 416
  21.     Width = 35
  22.     Height = 13
  23.     Caption = 'Version'
  24.     Font.Color = clWindowText
  25.     Font.Height = -12
  26.     Font.Name = 'MS Sans Serif'
  27.     Font.Style = []
  28.     ParentFont = False
  29.   end
  30.   object PrefPage: TTabbedNotebook
  31.     Left = 0
  32.     Top = 0
  33.     Width = 584
  34.     Height = 401
  35.     Align = alTop
  36.     Font.Color = clWindowText
  37.     Font.Height = -11
  38.     Font.Name = 'MS Sans Serif'
  39.     Font.Style = []
  40.     TabsPerRow = 6
  41.     TabFont.Color = clBtnText
  42.     TabFont.Height = -12
  43.     TabFont.Name = 'MS Sans Serif'
  44.     TabFont.Style = []
  45.     TabOrder = 0
  46.     object TTabPage
  47.       Left = 4
  48.       Top = 24
  49.       Caption = 'General'
  50.       object GroupBox2: TGroupBox
  51.         Left = 384
  52.         Top = 8
  53.         Width = 185
  54.         Height = 137
  55.         Caption = 'Emulation'
  56.         TabOrder = 0
  57.         object ANSI: TCheckBox
  58.           Left = 16
  59.           Top = 24
  60.           Width = 124
  61.           Height = 17
  62.           Hint = '|Enable ANSI color emulation'
  63.           Alignment = taLeftJustify
  64.           Caption = 'ANSI Color'
  65.           Font.Color = clWindowText
  66.           Font.Height = -12
  67.           Font.Name = 'MS Sans Serif'
  68.           Font.Style = []
  69.           ParentFont = False
  70.           TabOrder = 0
  71.         end
  72.         object DoVt: TCheckBox
  73.           Left = 16
  74.           Top = 40
  75.           Width = 124
  76.           Height = 17
  77.           Hint = '|Enable VT102 emulation'
  78.           Alignment = taLeftJustify
  79.           Caption = 'VT102 emulation'
  80.           Font.Color = clWindowText
  81.           Font.Height = -12
  82.           Font.Name = 'MS Sans Serif'
  83.           Font.Style = []
  84.           ParentFont = False
  85.           TabOrder = 1
  86.         end
  87.         object DoOption: TCheckBox
  88.           Left = 16
  89.           Top = 72
  90.           Width = 124
  91.           Height = 17
  92.           Hint = '|Enable strict telnet options negotiation'
  93.           Alignment = taLeftJustify
  94.           Caption = 'Telnet protocol'
  95.           Font.Color = clWindowText
  96.           Font.Height = -12
  97.           Font.Name = 'MS Sans Serif'
  98.           Font.Style = []
  99.           ParentFont = False
  100.           TabOrder = 3
  101.         end
  102.         object DoTelnet: TCheckBox
  103.           Left = 16
  104.           Top = 88
  105.           Width = 124
  106.           Height = 17
  107.           Hint = 
  108.             '|Enable character mode rather than line mode for strict telnet o' +
  109.             'peration'
  110.           Alignment = taLeftJustify
  111.           Caption = 'Character mode'
  112.           Font.Color = clWindowText
  113.           Font.Height = -12
  114.           Font.Name = 'MS Sans Serif'
  115.           Font.Style = []
  116.           ParentFont = False
  117.           TabOrder = 4
  118.         end
  119.         object DoEmulate: TCheckBox
  120.           Left = 16
  121.           Top = 104
  122.           Width = 124
  123.           Height = 17
  124.           Hint = 
  125.             '|If unchecked, all emulation of control codes is disabled and de' +
  126.             'bug mode is enabled'
  127.           Alignment = taLeftJustify
  128.           Caption = 'Emulate control codes'
  129.           Font.Color = clWindowText
  130.           Font.Height = -12
  131.           Font.Name = 'MS Sans Serif'
  132.           Font.Style = []
  133.           ParentFont = False
  134.           TabOrder = 5
  135.         end
  136.         object MrTerm: TCheckBox
  137.           Left = 16
  138.           Top = 56
  139.           Width = 124
  140.           Height = 17
  141.           Hint = '|Enable emulation of control codes used by MrTerm'
  142.           Alignment = taLeftJustify
  143.           Caption = 'MrTerm emulation'
  144.           Font.Color = clWindowText
  145.           Font.Height = -12
  146.           Font.Name = 'MS Sans Serif'
  147.           Font.Style = []
  148.           ParentFont = False
  149.           TabOrder = 2
  150.         end
  151.       end
  152.       object GroupBox3: TGroupBox
  153.         Left = 0
  154.         Top = 8
  155.         Width = 185
  156.         Height = 225
  157.         Caption = 'Command Parser'
  158.         TabOrder = 1
  159.         object ShowTrigger: TCheckBox
  160.           Left = 16
  161.           Top = 24
  162.           Width = 124
  163.           Height = 17
  164.           Hint = 
  165.             '|Display a line of information when a trigger fires (for debuggi' +
  166.             'ng)'
  167.           Alignment = taLeftJustify
  168.           Caption = 'Show Triggers'
  169.           Font.Color = clWindowText
  170.           Font.Height = -12
  171.           Font.Name = 'MS Sans Serif'
  172.           Font.Style = []
  173.           ParentFont = False
  174.           TabOrder = 0
  175.         end
  176.         object Echo: TCheckBox
  177.           Left = 16
  178.           Top = 40
  179.           Width = 124
  180.           Height = 17
  181.           Hint = '|Echo commands locally to the MUD window'
  182.           Alignment = taLeftJustify
  183.           Caption = 'Echo Commands'
  184.           Font.Color = clWindowText
  185.           Font.Height = -12
  186.           Font.Name = 'MS Sans Serif'
  187.           Font.Style = []
  188.           ParentFont = False
  189.           TabOrder = 1
  190.         end
  191.         object CapCom: TCheckBox
  192.           Left = 16
  193.           Top = 72
  194.           Width = 124
  195.           Height = 16
  196.           Hint = '|When capturing text to another window, capture commands also'
  197.           Alignment = taLeftJustify
  198.           Caption = 'Capture Commands'
  199.           Font.Color = clWindowText
  200.           Font.Height = -12
  201.           Font.Name = 'MS Sans Serif'
  202.           Font.Style = []
  203.           ParentFont = False
  204.           TabOrder = 3
  205.         end
  206.         object GagPass: TCheckBox
  207.           Left = 16
  208.           Top = 88
  209.           Width = 124
  210.           Height = 16
  211.           Hint = 
  212.             '|Delete any line from the screen containing your character passw' +
  213.             'ord'
  214.           Alignment = taLeftJustify
  215.           Caption = 'Gag password'
  216.           Font.Color = clWindowText
  217.           Font.Height = -12
  218.           Font.Name = 'MS Sans Serif'
  219.           Font.Style = []
  220.           ParentFont = False
  221.           TabOrder = 4
  222.         end
  223.         object DoSquare: TCheckBox
  224.           Left = 16
  225.           Top = 112
  226.           Width = 124
  227.           Height = 17
  228.           Hint = '|Allow [] syntax in command line to force evaluation'
  229.           Alignment = taLeftJustify
  230.           Caption = 'Allow [] for eval'
  231.           Font.Color = clWindowText
  232.           Font.Height = -12
  233.           Font.Name = 'MS Sans Serif'
  234.           Font.Style = []
  235.           ParentFont = False
  236.           TabOrder = 5
  237.         end
  238.         object DoAssign: TCheckBox
  239.           Left = 16
  240.           Top = 144
  241.           Width = 124
  242.           Height = 17
  243.           Hint = '|Allow a=b variable assignment syntax in command line'
  244.           Alignment = taLeftJustify
  245.           Caption = 'a = b syntax'
  246.           Font.Color = clWindowText
  247.           Font.Height = -12
  248.           Font.Name = 'MS Sans Serif'
  249.           Font.Style = []
  250.           ParentFont = False
  251.           TabOrder = 7
  252.         end
  253.         object StripQuotes: TCheckBox
  254.           Left = 16
  255.           Top = 160
  256.           Width = 124
  257.           Height = 17
  258.           Hint = '|Strip single quotes '#39' when used in scripts'
  259.           Alignment = taLeftJustify
  260.           Caption = 'Strip '#39' quotes'
  261.           Font.Color = clWindowText
  262.           Font.Height = -12
  263.           Font.Name = 'MS Sans Serif'
  264.           Font.Style = []
  265.           ParentFont = False
  266.           TabOrder = 8
  267.         end
  268.         object DoCurly: TCheckBox
  269.           Left = 16
  270.           Top = 128
  271.           Width = 124
  272.           Height = 17
  273.           Hint = '|Allow <> in command line to force variable expansion'
  274.           Alignment = taLeftJustify
  275.           Caption = 'Allow <> for expand'
  276.           Font.Color = clWindowText
  277.           Font.Height = -12
  278.           Font.Name = 'MS Sans Serif'
  279.           Font.Style = []
  280.           ParentFont = False
  281.           TabOrder = 6
  282.         end
  283.         object EchoInfo: TCheckBox
  284.           Left = 16
  285.           Top = 56
  286.           Width = 124
  287.           Height = 17
  288.           Hint = '|Echos zMUD information messages to the screen'
  289.           Alignment = taLeftJustify
  290.           Caption = 'Echo messages'
  291.           Font.Color = clWindowText
  292.           Font.Height = -12
  293.           Font.Name = 'MS Sans Serif'
  294.           Font.Style = []
  295.           ParentFont = False
  296.           TabOrder = 2
  297.         end
  298.         object StripDouble: TCheckBox
  299.           Left = 16
  300.           Top = 176
  301.           Width = 124
  302.           Height = 17
  303.           Hint = '|Strip double quotes " when used in scripts'
  304.           Alignment = taLeftJustify
  305.           Caption = 'Strip " quotes'
  306.           Font.Color = clWindowText
  307.           Font.Height = -12
  308.           Font.Name = 'MS Sans Serif'
  309.           Font.Style = []
  310.           ParentFont = False
  311.           TabOrder = 9
  312.         end
  313.         object DoExpand: TCheckBox
  314.           Left = 16
  315.           Top = 192
  316.           Width = 124
  317.           Height = 17
  318.           Hint = '|Expand variables in the command line'
  319.           Alignment = taLeftJustify
  320.           Caption = 'Expand Vars'
  321.           Font.Color = clWindowText
  322.           Font.Height = -12
  323.           Font.Name = 'MS Sans Serif'
  324.           Font.Style = []
  325.           ParentFont = False
  326.           TabOrder = 10
  327.         end
  328.       end
  329.       object GroupBox4: TGroupBox
  330.         Left = 192
  331.         Top = 264
  332.         Width = 185
  333.         Height = 105
  334.         Caption = 'Logging'
  335.         TabOrder = 2
  336.         object Label27: TLabel
  337.           Left = 18
  338.           Top = 77
  339.           Width = 82
  340.           Height = 13
  341.           Caption = 'Autosave interval'
  342.           Font.Color = clWindowText
  343.           Font.Height = -12
  344.           Font.Name = 'MS Sans Serif'
  345.           Font.Style = []
  346.           ParentFont = False
  347.         end
  348.         object LogCom: TCheckBox
  349.           Left = 16
  350.           Top = 24
  351.           Width = 124
  352.           Height = 17
  353.           Hint = '|Log commands to the log file'
  354.           Alignment = taLeftJustify
  355.           Caption = 'Log Commands'
  356.           Font.Color = clWindowText
  357.           Font.Height = -12
  358.           Font.Name = 'MS Sans Serif'
  359.           Font.Style = []
  360.           ParentFont = False
  361.           TabOrder = 0
  362.           OnClick = WrapClick
  363.         end
  364.         object LogGag: TCheckBox
  365.           Left = 16
  366.           Top = 40
  367.           Width = 124
  368.           Height = 17
  369.           Hint = '|If checked, log lines after triggers are tested and executed'
  370.           Alignment = taLeftJustify
  371.           Caption = 'Log after triggers'
  372.           Font.Color = clWindowText
  373.           Font.Height = -12
  374.           Font.Name = 'MS Sans Serif'
  375.           Font.Style = []
  376.           ParentFont = False
  377.           TabOrder = 1
  378.           OnClick = WrapClick
  379.         end
  380.         object LogAnsi: TCheckBox
  381.           Left = 16
  382.           Top = 56
  383.           Width = 124
  384.           Height = 17
  385.           Hint = '|Log ANSI color sequences to file'
  386.           Alignment = taLeftJustify
  387.           Caption = 'Log ANSI color'
  388.           Font.Color = clWindowText
  389.           Font.Height = -12
  390.           Font.Name = 'MS Sans Serif'
  391.           Font.Style = []
  392.           ParentFont = False
  393.           TabOrder = 2
  394.           OnClick = WrapClick
  395.         end
  396.         object LogSave: TSpinEdit
  397.           Left = 112
  398.           Top = 75
  399.           Width = 62
  400.           Height = 22
  401.           Hint = 
  402.             '|Number of minutes between autosaves of log file (0 to turn off ' +
  403.             'autosave)'
  404.           Font.Color = clWindowText
  405.           Font.Height = -11
  406.           Font.Name = 'MS Sans Serif'
  407.           Font.Style = []
  408.           MaxValue = 255
  409.           MinValue = 0
  410.           ParentFont = False
  411.           TabOrder = 3
  412.           Value = 0
  413.         end
  414.       end
  415.       object GroupBox11: TGroupBox
  416.         Left = 384
  417.         Top = 152
  418.         Width = 185
  419.         Height = 137
  420.         Caption = 'Word Wrap'
  421.         TabOrder = 3
  422.         object WrapTxt: TLabel
  423.           Left = 16
  424.           Top = 68
  425.           Width = 64
  426.           Height = 13
  427.           Alignment = taRightJustify
  428.           Caption = 'Wrap Column'
  429.           Font.Color = clWindowText
  430.           Font.Height = -12
  431.           Font.Name = 'MS Sans Serif'
  432.           Font.Style = []
  433.           ParentFont = False
  434.         end
  435.         object Label49: TLabel
  436.           Left = 16
  437.           Top = 92
  438.           Width = 59
  439.           Height = 13
  440.           Alignment = taRightJustify
  441.           Caption = 'Wrap Indent'
  442.           Font.Color = clWindowText
  443.           Font.Height = -12
  444.           Font.Name = 'MS Sans Serif'
  445.           Font.Style = []
  446.           ParentFont = False
  447.         end
  448.         object Wrap: TCheckBox
  449.           Left = 16
  450.           Top = 24
  451.           Width = 124
  452.           Height = 17
  453.           Hint = '|Enable word wrapping'
  454.           Alignment = taLeftJustify
  455.           Caption = 'Word Wrap'
  456.           Font.Color = clWindowText
  457.           Font.Height = -12
  458.           Font.Name = 'MS Sans Serif'
  459.           Font.Style = []
  460.           ParentFont = False
  461.           TabOrder = 0
  462.           OnClick = WrapClick
  463.         end
  464.         object AutoWrap: TCheckBox
  465.           Left = 16
  466.           Top = 40
  467.           Width = 124
  468.           Height = 17
  469.           Hint = '|Auto wrapping wraps the lines at the current window width'
  470.           Alignment = taLeftJustify
  471.           Caption = 'Auto Wrap'
  472.           Font.Color = clWindowText
  473.           Font.Height = -12
  474.           Font.Name = 'MS Sans Serif'
  475.           Font.Style = []
  476.           ParentFont = False
  477.           TabOrder = 1
  478.           OnClick = AutoWrapClick
  479.         end
  480.         object WrapCol: TSpinEdit
  481.           Left = 104
  482.           Top = 66
  483.           Width = 62
  484.           Height = 22
  485.           Hint = '|Set a specific column for word wrapping to occur at'
  486.           Font.Color = clWindowText
  487.           Font.Height = -11
  488.           Font.Name = 'MS Sans Serif'
  489.           Font.Style = []
  490.           MaxValue = 255
  491.           MinValue = 0
  492.           ParentFont = False
  493.           TabOrder = 2
  494.           Value = 0
  495.         end
  496.         object WrapInd: TSpinEdit
  497.           Left = 104
  498.           Top = 90
  499.           Width = 62
  500.           Height = 22
  501.           Hint = '|Set the number of characters to indent a wrapped line by'
  502.           Font.Color = clWindowText
  503.           Font.Height = -11
  504.           Font.Name = 'MS Sans Serif'
  505.           Font.Style = []
  506.           MaxValue = 80
  507.           MinValue = 0
  508.           ParentFont = False
  509.           TabOrder = 3
  510.           Value = 0
  511.         end
  512.       end
  513.       object GroupBox12: TGroupBox
  514.         Left = 192
  515.         Top = 8
  516.         Width = 185
  517.         Height = 257
  518.         Caption = 'User Interface'
  519.         TabOrder = 4
  520.         object Label75: TLabel
  521.           Left = 16
  522.           Top = 170
  523.           Width = 68
  524.           Height = 13
  525.           Caption = 'Scroll Amount:'
  526.           Font.Color = clWindowText
  527.           Font.Height = -12
  528.           Font.Name = 'MS Sans Serif'
  529.           Font.Style = []
  530.           ParentFont = False
  531.         end
  532.         object Label34: TLabel
  533.           Left = 16
  534.           Top = 194
  535.           Width = 58
  536.           Height = 13
  537.           Caption = 'History Size:'
  538.           Font.Color = clWindowText
  539.           Font.Height = -12
  540.           Font.Name = 'MS Sans Serif'
  541.           Font.Style = []
  542.           ParentFont = False
  543.         end
  544.         object Label22: TLabel
  545.           Left = 16
  546.           Top = 218
  547.           Width = 62
  548.           Height = 13
  549.           Caption = 'Tick Interval:'
  550.           Font.Color = clWindowText
  551.           Font.Height = -12
  552.           Font.Name = 'MS Sans Serif'
  553.           Font.Style = []
  554.           ParentFont = False
  555.         end
  556.         object SpeedButtons: TCheckBox
  557.           Left = 16
  558.           Top = 40
  559.           Width = 124
  560.           Height = 17
  561.           Hint = '|Display the tool bar at the top of the screen'
  562.           Alignment = taLeftJustify
  563.           Caption = 'Tool bar'
  564.           Font.Color = clWindowText
  565.           Font.Height = -12
  566.           Font.Name = 'MS Sans Serif'
  567.           Font.Style = []
  568.           ParentFont = False
  569.           TabOrder = 1
  570.         end
  571.         object HelpHint: TCheckBox
  572.           Left = 16
  573.           Top = 56
  574.           Width = 124
  575.           Height = 17
  576.           Hint = '|Display help balloons when the mouse is placed over hotspots'
  577.           Alignment = taLeftJustify
  578.           Caption = 'Help Balloons'
  579.           Font.Color = clWindowText
  580.           Font.Height = -12
  581.           Font.Name = 'MS Sans Serif'
  582.           Font.Style = []
  583.           ParentFont = False
  584.           TabOrder = 2
  585.         end
  586.         object ShowClock: TCheckBox
  587.           Left = 16
  588.           Top = 72
  589.           Width = 124
  590.           Height = 16
  591.           Hint = '|Turn on the clock in the lower right corner of the window'
  592.           Alignment = taLeftJustify
  593.           Caption = 'Clock'
  594.           Font.Color = clWindowText
  595.           Font.Height = -12
  596.           Font.Name = 'MS Sans Serif'
  597.           Font.Style = []
  598.           ParentFont = False
  599.           TabOrder = 3
  600.         end
  601.         object WinTabs: TCheckBox
  602.           Left = 16
  603.           Top = 88
  604.           Width = 124
  605.           Height = 16
  606.           Hint = '|Display a tab for each open window at the bottom of the screen'
  607.           Alignment = taLeftJustify
  608.           Caption = 'Window Tabs'
  609.           Font.Color = clWindowText
  610.           Font.Height = -12
  611.           Font.Name = 'MS Sans Serif'
  612.           Font.Style = []
  613.           ParentFont = False
  614.           TabOrder = 4
  615.         end
  616.         object NumLock: TCheckBox
  617.           Left = 16
  618.           Top = 104
  619.           Width = 124
  620.           Height = 17
  621.           Hint = '|Automatically enable NUMLOCK when program is launched'
  622.           Alignment = taLeftJustify
  623.           Caption = 'Auto NumLock'
  624.           Font.Color = clWindowText
  625.           Font.Height = -12
  626.           Font.Name = 'MS Sans Serif'
  627.           Font.Style = []
  628.           ParentFont = False
  629.           TabOrder = 5
  630.         end
  631.         object AutoSave: TCheckBox
  632.           Left = 16
  633.           Top = 128
  634.           Width = 124
  635.           Height = 16
  636.           Hint = '|Automatically save settings MUD file when window is closed'
  637.           Alignment = taLeftJustify
  638.           Caption = 'Autosave on exit'
  639.           Font.Color = clWindowText
  640.           Font.Height = -12
  641.           Font.Name = 'MS Sans Serif'
  642.           Font.Style = []
  643.           ParentFont = False
  644.           TabOrder = 6
  645.         end
  646.         object AutoClear: TCheckBox
  647.           Left = 16
  648.           Top = 24
  649.           Width = 124
  650.           Height = 17
  651.           Hint = 
  652.             '|If checked, clear the command line when Enter is pressed, other' +
  653.             'wise just select the text'
  654.           Alignment = taLeftJustify
  655.           Caption = 'Auto Clear Input'
  656.           Font.Color = clWindowText
  657.           Font.Height = -12
  658.           Font.Name = 'MS Sans Serif'
  659.           Font.Style = []
  660.           ParentFont = False
  661.           TabOrder = 0
  662.         end
  663.         object Scroll: TSpinEdit
  664.           Left = 112
  665.           Top = 168
  666.           Width = 62
  667.           Height = 22
  668.           Hint = 
  669.             '|Sets the number of lines to parse before refreshing display (1 ' +
  670.             'is smoothest, 0 is no refresh, default is 5)'
  671.           Font.Color = clWindowText
  672.           Font.Height = -11
  673.           Font.Name = 'MS Sans Serif'
  674.           Font.Style = []
  675.           MaxValue = 99
  676.           MinValue = 0
  677.           ParentFont = False
  678.           TabOrder = 8
  679.           Value = 0
  680.         end
  681.         object HistSize: TSpinEdit
  682.           Left = 112
  683.           Top = 192
  684.           Width = 62
  685.           Height = 22
  686.           Hint = '|Number of commands to remember in command history'
  687.           Font.Color = clWindowText
  688.           Font.Height = -11
  689.           Font.Name = 'MS Sans Serif'
  690.           Font.Style = []
  691.           MaxValue = 999
  692.           MinValue = 0
  693.           ParentFont = False
  694.           TabOrder = 9
  695.           Value = 20
  696.         end
  697.         object TickTimer: TSpinEdit
  698.           Left = 112
  699.           Top = 216
  700.           Width = 62
  701.           Height = 22
  702.           Hint = '|Number of seconds before tick expires to give warning message'
  703.           Font.Color = clWindowText
  704.           Font.Height = -11
  705.           Font.Name = 'MS Sans Serif'
  706.           Font.Style = []
  707.           MaxValue = 255
  708.           MinValue = 0
  709.           ParentFont = False
  710.           TabOrder = 10
  711.           Value = 0
  712.         end
  713.         object DoBackup: TCheckBox
  714.           Left = 16
  715.           Top = 144
  716.           Width = 124
  717.           Height = 16
  718.           Hint = 
  719.             '|Automatically create a backup file whenever new settings are wr' +
  720.             'itten'
  721.           Alignment = taLeftJustify
  722.           Caption = 'Backup settings'
  723.           Font.Color = clWindowText
  724.           Font.Height = -12
  725.           Font.Name = 'MS Sans Serif'
  726.           Font.Style = []
  727.           ParentFont = False
  728.           TabOrder = 7
  729.         end
  730.       end
  731.       object GroupBox13: TGroupBox
  732.         Left = 0
  733.         Top = 240
  734.         Width = 185
  735.         Height = 105
  736.         Caption = 'Spam Protection'
  737.         TabOrder = 5
  738.         object Label21: TLabel
  739.           Left = 16
  740.           Top = 26
  741.           Width = 54
  742.           Height = 13
  743.           Caption = 'Spam Limit:'
  744.           Font.Color = clWindowText
  745.           Font.Height = -12
  746.           Font.Name = 'MS Sans Serif'
  747.           Font.Style = []
  748.           ParentFont = False
  749.         end
  750.         object Label26: TLabel
  751.           Left = 16
  752.           Top = 50
  753.           Width = 66
  754.           Height = 13
  755.           Alignment = taRightJustify
  756.           Caption = 'Spam Length:'
  757.           Font.Color = clWindowText
  758.           Font.Height = -12
  759.           Font.Name = 'MS Sans Serif'
  760.           Font.Style = []
  761.           ParentFont = False
  762.         end
  763.         object Label20: TLabel
  764.           Left = 16
  765.           Top = 74
  766.           Width = 80
  767.           Height = 13
  768.           Alignment = taRightJustify
  769.           Caption = 'Spam Command:'
  770.           Font.Color = clWindowText
  771.           Font.Height = -12
  772.           Font.Name = 'MS Sans Serif'
  773.           Font.Style = []
  774.           ParentFont = False
  775.         end
  776.         object SpamCount: TSpinEdit
  777.           Left = 104
  778.           Top = 24
  779.           Width = 62
  780.           Height = 22
  781.           Hint = 
  782.             '|The number of identical commands sent to the MUD that triggers ' +
  783.             'spam protection'
  784.           Font.Color = clWindowText
  785.           Font.Height = -11
  786.           Font.Name = 'MS Sans Serif'
  787.           Font.Style = []
  788.           MaxValue = 255
  789.           MinValue = 0
  790.           ParentFont = False
  791.           TabOrder = 0
  792.           Value = 0
  793.         end
  794.         object SpamLen: TSpinEdit
  795.           Left = 104
  796.           Top = 48
  797.           Width = 62
  798.           Height = 22
  799.           Hint = '|The minimum length of a command counted towards the spam limit'
  800.           Font.Color = clWindowText
  801.           Font.Height = -11
  802.           Font.Name = 'MS Sans Serif'
  803.           Font.Style = []
  804.           MaxValue = 255
  805.           MinValue = 0
  806.           ParentFont = False
  807.           TabOrder = 1
  808.           Value = 0
  809.         end
  810.         object SpamCom: TEdit
  811.           Left = 104
  812.           Top = 72
  813.           Width = 62
  814.           Height = 21
  815.           Hint = 
  816.             '|The command sent to the MUD when Spam Limit identical commands ' +
  817.             'are sent'
  818.           AutoSize = False
  819.           Font.Color = clWindowText
  820.           Font.Height = -12
  821.           Font.Name = 'MS Sans Serif'
  822.           Font.Style = []
  823.           MaxLength = 80
  824.           ParentFont = False
  825.           TabOrder = 2
  826.         end
  827.       end
  828.     end
  829.     object TTabPage
  830.       Left = 4
  831.       Top = 24
  832.       Caption = 'Characters'
  833.       object Label51: TLabel
  834.         Left = 8
  835.         Top = 288
  836.         Width = 320
  837.         Height = 13
  838.         Caption = 
  839.           'If this option is checked, characters for this setting file can ' +
  840.           'be edited'
  841.         Font.Color = clWindowText
  842.         Font.Height = -12
  843.         Font.Name = 'MS Sans Serif'
  844.         Font.Style = []
  845.         ParentFont = False
  846.       end
  847.       object Label52: TLabel
  848.         Left = 8
  849.         Top = 302
  850.         Width = 269
  851.         Height = 13
  852.         Caption = 'but characters from the Inherited file will actually be used.'
  853.         Font.Color = clWindowText
  854.         Font.Height = -12
  855.         Font.Name = 'MS Sans Serif'
  856.         Font.Style = []
  857.         ParentFont = False
  858.       end
  859.       object Panel3: TPanel
  860.         Left = 8
  861.         Top = 8
  862.         Width = 537
  863.         Height = 249
  864.         BevelOuter = bvLowered
  865.         TabOrder = 0
  866.         object Label7: TLabel
  867.           Left = 26
  868.           Top = 18
  869.           Width = 89
  870.           Height = 13
  871.           Alignment = taRightJustify
  872.           Caption = 'Command Char:'
  873.           Font.Color = clWindowText
  874.           Font.Height = -12
  875.           Font.Name = 'MS Sans Serif'
  876.           Font.Style = [fsBold]
  877.           ParentFont = False
  878.         end
  879.         object Label8: TLabel
  880.           Left = 25
  881.           Top = 42
  882.           Width = 90
  883.           Height = 13
  884.           Alignment = taRightJustify
  885.           Caption = 'Separator Char:'
  886.           Font.Color = clWindowText
  887.           Font.Height = -12
  888.           Font.Name = 'MS Sans Serif'
  889.           Font.Style = [fsBold]
  890.           ParentFont = False
  891.         end
  892.         object Label14: TLabel
  893.           Left = 34
  894.           Top = 66
  895.           Width = 81
  896.           Height = 13
  897.           Alignment = taRightJustify
  898.           Caption = 'Variable Char:'
  899.           Font.Color = clWindowText
  900.           Font.Height = -12
  901.           Font.Name = 'MS Sans Serif'
  902.           Font.Style = [fsBold]
  903.           ParentFont = False
  904.         end
  905.         object Label23: TLabel
  906.           Left = 41
  907.           Top = 162
  908.           Width = 74
  909.           Height = 13
  910.           Alignment = taRightJustify
  911.           Caption = 'History Char:'
  912.           Font.Color = clWindowText
  913.           Font.Height = -12
  914.           Font.Name = 'MS Sans Serif'
  915.           Font.Style = [fsBold]
  916.           ParentFont = False
  917.         end
  918.         object UseParamChar: TLabel
  919.           Left = 23
  920.           Top = 90
  921.           Width = 92
  922.           Height = 13
  923.           Alignment = taRightJustify
  924.           Caption = 'Parameter Char:'
  925.           Font.Color = clWindowText
  926.           Font.Height = -12
  927.           Font.Name = 'MS Sans Serif'
  928.           Font.Style = [fsBold]
  929.           ParentFont = False
  930.         end
  931.         object Label25: TLabel
  932.           Left = 22
  933.           Top = 138
  934.           Width = 93
  935.           Height = 13
  936.           Alignment = taRightJustify
  937.           Caption = 'Movement Char:'
  938.           Font.Color = clWindowText
  939.           Font.Height = -12
  940.           Font.Name = 'MS Sans Serif'
  941.           Font.Style = [fsBold]
  942.           ParentFont = False
  943.         end
  944.         object UseFocusChar: TLabel
  945.           Left = 46
  946.           Top = 114
  947.           Width = 69
  948.           Height = 13
  949.           Alignment = taRightJustify
  950.           Caption = 'Focus Char:'
  951.           Font.Color = clWindowText
  952.           Font.Height = -12
  953.           Font.Name = 'MS Sans Serif'
  954.           Font.Style = [fsBold]
  955.           ParentFont = False
  956.         end
  957.         object Label77: TLabel
  958.           Left = 46
  959.           Top = 186
  960.           Width = 69
  961.           Height = 13
  962.           Alignment = taRightJustify
  963.           Caption = 'Quote Char:'
  964.           Font.Color = clWindowText
  965.           Font.Height = -12
  966.           Font.Name = 'MS Sans Serif'
  967.           Font.Style = [fsBold]
  968.           ParentFont = False
  969.         end
  970.         object Label1: TLabel
  971.           Left = 198
  972.           Top = 18
  973.           Width = 183
  974.           Height = 13
  975.           Caption = 'Used to begin commands.  Default is #'
  976.           Font.Color = clWindowText
  977.           Font.Height = -12
  978.           Font.Name = 'MS Sans Serif'
  979.           Font.Style = []
  980.           ParentFont = False
  981.         end
  982.         object Label2: TLabel
  983.           Left = 198
  984.           Top = 42
  985.           Width = 275
  986.           Height = 13
  987.           Caption = 'Used to seperate multiple commands on a line.  Default is ;'
  988.           Font.Color = clWindowText
  989.           Font.Height = -12
  990.           Font.Name = 'MS Sans Serif'
  991.           Font.Style = []
  992.           ParentFont = False
  993.         end
  994.         object Label3: TLabel
  995.           Left = 198
  996.           Top = 66
  997.           Width = 250
  998.           Height = 13
  999.           Caption = 'Used to expand the value of a variable.  Default is @'
  1000.           Font.Color = clWindowText
  1001.           Font.Height = -12
  1002.           Font.Name = 'MS Sans Serif'
  1003.           Font.Style = []
  1004.           ParentFont = False
  1005.         end
  1006.         object Label4: TLabel
  1007.           Left = 198
  1008.           Top = 114
  1009.           Width = 259
  1010.           Height = 13
  1011.           Caption = 'Used to send commands to other windows.  Default is :'
  1012.           Font.Color = clWindowText
  1013.           Font.Height = -12
  1014.           Font.Name = 'MS Sans Serif'
  1015.           Font.Style = []
  1016.           ParentFont = False
  1017.         end
  1018.         object Label5: TLabel
  1019.           Left = 198
  1020.           Top = 90
  1021.           Width = 297
  1022.           Height = 13
  1023.           Caption = 'Used to expand internal variables and parameters.  Default is %'
  1024.           Font.Color = clWindowText
  1025.           Font.Height = -12
  1026.           Font.Name = 'MS Sans Serif'
  1027.           Font.Style = []
  1028.           ParentFont = False
  1029.         end
  1030.         object Label6: TLabel
  1031.           Left = 198
  1032.           Top = 138
  1033.           Width = 243
  1034.           Height = 13
  1035.           Caption = 'Used to begin speedwalking and paths.  Default is .'
  1036.           Font.Color = clWindowText
  1037.           Font.Height = -12
  1038.           Font.Name = 'MS Sans Serif'
  1039.           Font.Style = []
  1040.           ParentFont = False
  1041.         end
  1042.         object Label9: TLabel
  1043.           Left = 198
  1044.           Top = 162
  1045.           Width = 223
  1046.           Height = 13
  1047.           Caption = 'Use to recall from command history.  Default is !'
  1048.           Font.Color = clWindowText
  1049.           Font.Height = -12
  1050.           Font.Name = 'MS Sans Serif'
  1051.           Font.Style = []
  1052.           ParentFont = False
  1053.         end
  1054.         object Label10: TLabel
  1055.           Left = 198
  1056.           Top = 186
  1057.           Width = 254
  1058.           Height = 13
  1059.           Caption = 'Used to escape other special characters.  Default is ~'
  1060.           Font.Color = clWindowText
  1061.           Font.Height = -12
  1062.           Font.Name = 'MS Sans Serif'
  1063.           Font.Style = []
  1064.           ParentFont = False
  1065.         end
  1066.         object Label40: TLabel
  1067.           Left = 154
  1068.           Top = 5
  1069.           Width = 39
  1070.           Height = 13
  1071.           Caption = 'Enabled'
  1072.           Font.Color = clWindowText
  1073.           Font.Height = -11
  1074.           Font.Name = 'MS Sans Serif'
  1075.           Font.Style = []
  1076.           ParentFont = False
  1077.         end
  1078.         object ComChar: TEdit
  1079.           Left = 120
  1080.           Top = 16
  1081.           Width = 25
  1082.           Height = 21
  1083.           AutoSize = False
  1084.           Font.Color = clWindowText
  1085.           Font.Height = -12
  1086.           Font.Name = 'MS Sans Serif'
  1087.           Font.Style = []
  1088.           MaxLength = 1
  1089.           ParentFont = False
  1090.           TabOrder = 0
  1091.         end
  1092.         object SepChar: TEdit
  1093.           Left = 120
  1094.           Top = 40
  1095.           Width = 25
  1096.           Height = 21
  1097.           AutoSize = False
  1098.           Font.Color = clWindowText
  1099.           Font.Height = -12
  1100.           Font.Name = 'MS Sans Serif'
  1101.           Font.Style = []
  1102.           MaxLength = 1
  1103.           ParentFont = False
  1104.           TabOrder = 1
  1105.         end
  1106.         object VarChar: TEdit
  1107.           Left = 120
  1108.           Top = 64
  1109.           Width = 25
  1110.           Height = 21
  1111.           AutoSize = False
  1112.           Font.Color = clWindowText
  1113.           Font.Height = -12
  1114.           Font.Name = 'MS Sans Serif'
  1115.           Font.Style = []
  1116.           MaxLength = 1
  1117.           ParentFont = False
  1118.           TabOrder = 2
  1119.         end
  1120.         object HistChar: TEdit
  1121.           Left = 120
  1122.           Top = 160
  1123.           Width = 25
  1124.           Height = 21
  1125.           AutoSize = False
  1126.           Font.Color = clWindowText
  1127.           Font.Height = -12
  1128.           Font.Name = 'MS Sans Serif'
  1129.           Font.Style = []
  1130.           MaxLength = 1
  1131.           ParentFont = False
  1132.           TabOrder = 5
  1133.         end
  1134.         object ParamChar: TEdit
  1135.           Left = 120
  1136.           Top = 88
  1137.           Width = 25
  1138.           Height = 21
  1139.           AutoSize = False
  1140.           Font.Color = clWindowText
  1141.           Font.Height = -12
  1142.           Font.Name = 'MS Sans Serif'
  1143.           Font.Style = []
  1144.           MaxLength = 1
  1145.           ParentFont = False
  1146.           TabOrder = 3
  1147.         end
  1148.         object MoveChar: TEdit
  1149.           Left = 120
  1150.           Top = 136
  1151.           Width = 25
  1152.           Height = 21
  1153.           AutoSize = False
  1154.           Font.Color = clWindowText
  1155.           Font.Height = -12
  1156.           Font.Name = 'MS Sans Serif'
  1157.           Font.Style = []
  1158.           MaxLength = 1
  1159.           ParentFont = False
  1160.           TabOrder = 4
  1161.         end
  1162.         object FocusChar: TEdit
  1163.           Left = 120
  1164.           Top = 112
  1165.           Width = 25
  1166.           Height = 21
  1167.           AutoSize = False
  1168.           Font.Color = clWindowText
  1169.           Font.Height = -12
  1170.           Font.Name = 'MS Sans Serif'
  1171.           Font.Style = []
  1172.           MaxLength = 1
  1173.           ParentFont = False
  1174.           TabOrder = 6
  1175.         end
  1176.         object QuoteChar: TEdit
  1177.           Left = 120
  1178.           Top = 184
  1179.           Width = 25
  1180.           Height = 21
  1181.           AutoSize = False
  1182.           Font.Color = clWindowText
  1183.           Font.Height = -12
  1184.           Font.Name = 'MS Sans Serif'
  1185.           Font.Style = []
  1186.           MaxLength = 1
  1187.           ParentFont = False
  1188.           TabOrder = 7
  1189.         end
  1190.         object UseComChar: TCheckBox
  1191.           Left = 166
  1192.           Top = 19
  1193.           Width = 20
  1194.           Height = 14
  1195.           State = cbChecked
  1196.           TabOrder = 8
  1197.         end
  1198.         object UseSepChar: TCheckBox
  1199.           Left = 166
  1200.           Top = 43
  1201.           Width = 20
  1202.           Height = 14
  1203.           State = cbChecked
  1204.           TabOrder = 9
  1205.         end
  1206.         object UseVarChar: TCheckBox
  1207.           Left = 166
  1208.           Top = 67
  1209.           Width = 20
  1210.           Height = 14
  1211.           State = cbChecked
  1212.           TabOrder = 10
  1213.         end
  1214.         object UsePChar: TCheckBox
  1215.           Left = 166
  1216.           Top = 91
  1217.           Width = 20
  1218.           Height = 14
  1219.           State = cbChecked
  1220.           TabOrder = 11
  1221.         end
  1222.         object UseFChar: TCheckBox
  1223.           Left = 166
  1224.           Top = 115
  1225.           Width = 20
  1226.           Height = 14
  1227.           State = cbChecked
  1228.           TabOrder = 12
  1229.         end
  1230.         object UseMoveChar: TCheckBox
  1231.           Left = 166
  1232.           Top = 139
  1233.           Width = 20
  1234.           Height = 14
  1235.           State = cbChecked
  1236.           TabOrder = 13
  1237.         end
  1238.         object UseHistChar: TCheckBox
  1239.           Left = 166
  1240.           Top = 163
  1241.           Width = 20
  1242.           Height = 14
  1243.           State = cbChecked
  1244.           TabOrder = 14
  1245.         end
  1246.         object UseQuoteChar: TCheckBox
  1247.           Left = 166
  1248.           Top = 187
  1249.           Width = 20
  1250.           Height = 14
  1251.           State = cbChecked
  1252.           TabOrder = 15
  1253.         end
  1254.         object DefChar: TBitBtn
  1255.           Left = 8
  1256.           Top = 216
  1257.           Width = 137
  1258.           Height = 25
  1259.           Caption = 'Restore Defaults'
  1260.           Font.Color = clWindowText
  1261.           Font.Height = -11
  1262.           Font.Name = 'MS Sans Serif'
  1263.           Font.Style = []
  1264.           ParentFont = False
  1265.           TabOrder = 16
  1266.           OnClick = DefCharClick
  1267.         end
  1268.       end
  1269.       object UseChar: TCheckBox
  1270.         Left = 8
  1271.         Top = 320
  1272.         Width = 353
  1273.         Height = 17
  1274.         Caption = 'Use characters from Inherited settings file'
  1275.         Font.Color = clWindowText
  1276.         Font.Height = -12
  1277.         Font.Name = 'MS Sans Serif'
  1278.         Font.Style = []
  1279.         ParentFont = False
  1280.         TabOrder = 1
  1281.       end
  1282.     end
  1283.     object TTabPage
  1284.       Left = 4
  1285.       Top = 24
  1286.       Caption = 'Directories'
  1287.       object GroupBox5: TGroupBox
  1288.         Left = 16
  1289.         Top = 8
  1290.         Width = 497
  1291.         Height = 93
  1292.         Caption = 'ZMUD.INI file location'
  1293.         Font.Color = clWindowText
  1294.         Font.Height = -12
  1295.         Font.Name = 'MS Sans Serif'
  1296.         Font.Style = [fsBold]
  1297.         ParentFont = False
  1298.         TabOrder = 0
  1299.         object Label36: TLabel
  1300.           Left = 16
  1301.           Top = 16
  1302.           Width = 384
  1303.           Height = 13
  1304.           Caption = 
  1305.             'Note, the ZMUD.INI located in the same directory as ZMUD.EXE is ' +
  1306.             'used to store '
  1307.           Font.Color = clWindowText
  1308.           Font.Height = -12
  1309.           Font.Name = 'MS Sans Serif'
  1310.           Font.Style = []
  1311.           ParentFont = False
  1312.         end
  1313.         object Label37: TLabel
  1314.           Left = 16
  1315.           Top = 30
  1316.           Width = 436
  1317.           Height = 13
  1318.           Caption = 
  1319.             'these Directory settings.  The ZMUD.INI in the following locatio' +
  1320.             'n is used for all other settings.'
  1321.           Font.Color = clWindowText
  1322.           Font.Height = -12
  1323.           Font.Name = 'MS Sans Serif'
  1324.           Font.Style = []
  1325.           ParentFont = False
  1326.         end
  1327.         object IniEXE: TRadioButton
  1328.           Left = 16
  1329.           Top = 48
  1330.           Width = 137
  1331.           Height = 17
  1332.           Caption = 'ZMUD.EXE directory'
  1333.           Checked = True
  1334.           Font.Color = clWindowText
  1335.           Font.Height = -12
  1336.           Font.Name = 'MS Sans Serif'
  1337.           Font.Style = []
  1338.           ParentFont = False
  1339.           TabOrder = 0
  1340.           TabStop = True
  1341.           OnClick = IniEXEClick
  1342.         end
  1343.         object IniCur: TRadioButton
  1344.           Left = 16
  1345.           Top = 64
  1346.           Width = 137
  1347.           Height = 17
  1348.           Caption = 'Current directory'
  1349.           Font.Color = clWindowText
  1350.           Font.Height = -12
  1351.           Font.Name = 'MS Sans Serif'
  1352.           Font.Style = []
  1353.           ParentFont = False
  1354.           TabOrder = 1
  1355.           OnClick = IniEXEClick
  1356.         end
  1357.         object IniOther: TRadioButton
  1358.           Left = 168
  1359.           Top = 48
  1360.           Width = 129
  1361.           Height = 17
  1362.           Caption = 'Other:'
  1363.           Font.Color = clWindowText
  1364.           Font.Height = -12
  1365.           Font.Name = 'MS Sans Serif'
  1366.           Font.Style = []
  1367.           ParentFont = False
  1368.           TabOrder = 2
  1369.           OnClick = IniEXEClick
  1370.         end
  1371.         object IniLoc: TEdit
  1372.           Left = 168
  1373.           Top = 64
  1374.           Width = 297
  1375.           Height = 21
  1376.           AutoSize = False
  1377.           Font.Color = clWindowText
  1378.           Font.Height = -12
  1379.           Font.Name = 'MS Sans Serif'
  1380.           Font.Style = []
  1381.           ParentFont = False
  1382.           TabOrder = 3
  1383.         end
  1384.       end
  1385.       object GroupBox6: TGroupBox
  1386.         Left = 16
  1387.         Top = 104
  1388.         Width = 497
  1389.         Height = 77
  1390.         Caption = 'MUDCHAR.DAT file location'
  1391.         Font.Color = clWindowText
  1392.         Font.Height = -12
  1393.         Font.Name = 'MS Sans Serif'
  1394.         Font.Style = [fsBold]
  1395.         ParentFont = False
  1396.         TabOrder = 1
  1397.         object Label35: TLabel
  1398.           Left = 16
  1399.           Top = 16
  1400.           Width = 432
  1401.           Height = 13
  1402.           Caption = 
  1403.             'This file stores MUD names, address, port, and character names a' +
  1404.             'nd passwords (encrypted)'
  1405.           Font.Color = clWindowText
  1406.           Font.Height = -12
  1407.           Font.Name = 'MS Sans Serif'
  1408.           Font.Style = []
  1409.           ParentFont = False
  1410.         end
  1411.         object CharEXE: TRadioButton
  1412.           Left = 16
  1413.           Top = 32
  1414.           Width = 137
  1415.           Height = 17
  1416.           Caption = 'ZMUD.EXE directory'
  1417.           Checked = True
  1418.           Font.Color = clWindowText
  1419.           Font.Height = -12
  1420.           Font.Name = 'MS Sans Serif'
  1421.           Font.Style = []
  1422.           ParentFont = False
  1423.           TabOrder = 0
  1424.           TabStop = True
  1425.           OnClick = CharEXEClick
  1426.         end
  1427.         object CharCur: TRadioButton
  1428.           Left = 16
  1429.           Top = 48
  1430.           Width = 137
  1431.           Height = 17
  1432.           Caption = 'Current directory'
  1433.           Font.Color = clWindowText
  1434.           Font.Height = -12
  1435.           Font.Name = 'MS Sans Serif'
  1436.           Font.Style = []
  1437.           ParentFont = False
  1438.           TabOrder = 1
  1439.           OnClick = CharEXEClick
  1440.         end
  1441.         object CharOther: TRadioButton
  1442.           Left = 168
  1443.           Top = 32
  1444.           Width = 129
  1445.           Height = 17
  1446.           Caption = 'Other:'
  1447.           Font.Color = clWindowText
  1448.           Font.Height = -12
  1449.           Font.Name = 'MS Sans Serif'
  1450.           Font.Style = []
  1451.           ParentFont = False
  1452.           TabOrder = 2
  1453.           OnClick = CharEXEClick
  1454.         end
  1455.         object CharLoc: TEdit
  1456.           Left = 168
  1457.           Top = 48
  1458.           Width = 297
  1459.           Height = 21
  1460.           AutoSize = False
  1461.           Font.Color = clWindowText
  1462.           Font.Height = -12
  1463.           Font.Name = 'MS Sans Serif'
  1464.           Font.Style = []
  1465.           ParentFont = False
  1466.           TabOrder = 3
  1467.         end
  1468.       end
  1469.       object GroupBox7: TGroupBox
  1470.         Left = 16
  1471.         Top = 184
  1472.         Width = 497
  1473.         Height = 77
  1474.         Caption = 'Settings file locations'
  1475.         Font.Color = clWindowText
  1476.         Font.Height = -12
  1477.         Font.Name = 'MS Sans Serif'
  1478.         Font.Style = [fsBold]
  1479.         ParentFont = False
  1480.         TabOrder = 2
  1481.         object Label38: TLabel
  1482.           Left = 16
  1483.           Top = 16
  1484.           Width = 441
  1485.           Height = 13
  1486.           Caption = 
  1487.             'Default location (can be overridden).  Contains the triggers, al' +
  1488.             'iases, etc for various characters.'
  1489.           Font.Color = clWindowText
  1490.           Font.Height = -12
  1491.           Font.Name = 'MS Sans Serif'
  1492.           Font.Style = []
  1493.           ParentFont = False
  1494.         end
  1495.         object SetEXE: TRadioButton
  1496.           Left = 16
  1497.           Top = 32
  1498.           Width = 137
  1499.           Height = 17
  1500.           Caption = 'ZMUD.EXE directory'
  1501.           Font.Color = clWindowText
  1502.           Font.Height = -12
  1503.           Font.Name = 'MS Sans Serif'
  1504.           Font.Style = []
  1505.           ParentFont = False
  1506.           TabOrder = 0
  1507.           OnClick = SetEXEClick
  1508.         end
  1509.         object SetCur: TRadioButton
  1510.           Left = 16
  1511.           Top = 48
  1512.           Width = 137
  1513.           Height = 17
  1514.           Caption = 'Current directory'
  1515.           Checked = True
  1516.           Font.Color = clWindowText
  1517.           Font.Height = -12
  1518.           Font.Name = 'MS Sans Serif'
  1519.           Font.Style = []
  1520.           ParentFont = False
  1521.           TabOrder = 1
  1522.           TabStop = True
  1523.           OnClick = SetEXEClick
  1524.         end
  1525.         object SetOther: TRadioButton
  1526.           Left = 168
  1527.           Top = 32
  1528.           Width = 129
  1529.           Height = 17
  1530.           Caption = 'Other:'
  1531.           Font.Color = clWindowText
  1532.           Font.Height = -12
  1533.           Font.Name = 'MS Sans Serif'
  1534.           Font.Style = []
  1535.           ParentFont = False
  1536.           TabOrder = 2
  1537.           OnClick = SetEXEClick
  1538.         end
  1539.         object SetLoc: TEdit
  1540.           Left = 168
  1541.           Top = 48
  1542.           Width = 297
  1543.           Height = 21
  1544.           AutoSize = False
  1545.           Font.Color = clWindowText
  1546.           Font.Height = -12
  1547.           Font.Name = 'MS Sans Serif'
  1548.           Font.Style = []
  1549.           ParentFont = False
  1550.           TabOrder = 3
  1551.         end
  1552.       end
  1553.       object GroupBox8: TGroupBox
  1554.         Left = 16
  1555.         Top = 264
  1556.         Width = 497
  1557.         Height = 77
  1558.         Caption = 'Sound file locations'
  1559.         Font.Color = clWindowText
  1560.         Font.Height = -12
  1561.         Font.Name = 'MS Sans Serif'
  1562.         Font.Style = [fsBold]
  1563.         ParentFont = False
  1564.         TabOrder = 3
  1565.         object Label39: TLabel
  1566.           Left = 16
  1567.           Top = 16
  1568.           Width = 334
  1569.           Height = 13
  1570.           Caption = 
  1571.             'Used to locate sound files for Sound Settings and for #PLAY comm' +
  1572.             'and'
  1573.           Font.Color = clWindowText
  1574.           Font.Height = -12
  1575.           Font.Name = 'MS Sans Serif'
  1576.           Font.Style = []
  1577.           ParentFont = False
  1578.         end
  1579.         object SoundEXE: TRadioButton
  1580.           Left = 16
  1581.           Top = 32
  1582.           Width = 137
  1583.           Height = 17
  1584.           Caption = 'ZMUD.EXE directory'
  1585.           Font.Color = clWindowText
  1586.           Font.Height = -12
  1587.           Font.Name = 'MS Sans Serif'
  1588.           Font.Style = []
  1589.           ParentFont = False
  1590.           TabOrder = 0
  1591.           OnClick = SoundEXEClick
  1592.         end
  1593.         object SoundCur: TRadioButton
  1594.           Left = 16
  1595.           Top = 48
  1596.           Width = 137
  1597.           Height = 17
  1598.           Caption = 'Current directory'
  1599.           Checked = True
  1600.           Font.Color = clWindowText
  1601.           Font.Height = -12
  1602.           Font.Name = 'MS Sans Serif'
  1603.           Font.Style = []
  1604.           ParentFont = False
  1605.           TabOrder = 1
  1606.           TabStop = True
  1607.           OnClick = SoundEXEClick
  1608.         end
  1609.         object SoundOther: TRadioButton
  1610.           Left = 168
  1611.           Top = 32
  1612.           Width = 129
  1613.           Height = 17
  1614.           Caption = 'Other:'
  1615.           Font.Color = clWindowText
  1616.           Font.Height = -12
  1617.           Font.Name = 'MS Sans Serif'
  1618.           Font.Style = []
  1619.           ParentFont = False
  1620.           TabOrder = 2
  1621.           OnClick = SoundEXEClick
  1622.         end
  1623.         object SoundLoc: TEdit
  1624.           Left = 168
  1625.           Top = 48
  1626.           Width = 297
  1627.           Height = 21
  1628.           AutoSize = False
  1629.           Font.Color = clWindowText
  1630.           Font.Height = -12
  1631.           Font.Name = 'MS Sans Serif'
  1632.           Font.Style = []
  1633.           ParentFont = False
  1634.           TabOrder = 3
  1635.         end
  1636.       end
  1637.     end
  1638.     object TTabPage
  1639.       Left = 4
  1640.       Top = 24
  1641.       Caption = 'Connection'
  1642.       object GroupBox1: TGroupBox
  1643.         Left = 376
  1644.         Top = 216
  1645.         Width = 137
  1646.         Height = 121
  1647.         Caption = 'Carriage Control'
  1648.         Font.Color = clWindowText
  1649.         Font.Height = -12
  1650.         Font.Name = 'MS Sans Serif'
  1651.         Font.Style = []
  1652.         ParentFont = False
  1653.         TabOrder = 0
  1654.         object CR: TRadioButton
  1655.           Left = 32
  1656.           Top = 64
  1657.           Width = 73
  1658.           Height = 17
  1659.           Hint = '|New line when Carraige Return (char 13) received'
  1660.           Alignment = taLeftJustify
  1661.           Caption = 'CR'
  1662.           Font.Color = clWindowText
  1663.           Font.Height = -12
  1664.           Font.Name = 'MS Sans Serif'
  1665.           Font.Style = []
  1666.           ParentFont = False
  1667.           TabOrder = 0
  1668.         end
  1669.         object LF: TRadioButton
  1670.           Left = 32
  1671.           Top = 48
  1672.           Width = 73
  1673.           Height = 17
  1674.           Hint = '|New line when Line feed (char 10) received'
  1675.           Alignment = taLeftJustify
  1676.           Caption = 'LF'
  1677.           Checked = True
  1678.           Font.Color = clWindowText
  1679.           Font.Height = -12
  1680.           Font.Name = 'MS Sans Serif'
  1681.           Font.Style = []
  1682.           ParentFont = False
  1683.           TabOrder = 1
  1684.           TabStop = True
  1685.         end
  1686.       end
  1687.       object GroupBox9: TGroupBox
  1688.         Left = 24
  1689.         Top = 8
  1690.         Width = 489
  1691.         Height = 201
  1692.         Caption = 'IP address Lookup parameters'
  1693.         Font.Color = clWindowText
  1694.         Font.Height = -11
  1695.         Font.Name = 'MS Sans Serif'
  1696.         Font.Style = [fsBold]
  1697.         ParentFont = False
  1698.         TabOrder = 1
  1699.         object Label24: TLabel
  1700.           Left = 32
  1701.           Top = 26
  1702.           Width = 357
  1703.           Height = 13
  1704.           Caption = 
  1705.             'Converting hostnames to IP addresses uses a non-reliable network' +
  1706.             ' protocol.'
  1707.           Font.Color = clWindowText
  1708.           Font.Height = -12
  1709.           Font.Name = 'MS Sans Serif'
  1710.           Font.Style = []
  1711.           ParentFont = False
  1712.         end
  1713.         object Label41: TLabel
  1714.           Left = 32
  1715.           Top = 42
  1716.           Width = 257
  1717.           Height = 13
  1718.           Caption = 'thus, zMUD tries several times for a successful lookup.'
  1719.           Font.Color = clWindowText
  1720.           Font.Height = -12
  1721.           Font.Name = 'MS Sans Serif'
  1722.           Font.Style = []
  1723.           ParentFont = False
  1724.         end
  1725.         object Label42: TLabel
  1726.           Left = 32
  1727.           Top = 58
  1728.           Width = 356
  1729.           Height = 13
  1730.           Caption = 
  1731.             'The parameters below specify the timeout value for the first loo' +
  1732.             'kup attempt, '
  1733.           Font.Color = clWindowText
  1734.           Font.Height = -12
  1735.           Font.Name = 'MS Sans Serif'
  1736.           Font.Style = []
  1737.           ParentFont = False
  1738.         end
  1739.         object Label43: TLabel
  1740.           Left = 32
  1741.           Top = 74
  1742.           Width = 209
  1743.           Height = 13
  1744.           Caption = 'the timeout value for the last lookup attempt,'
  1745.           Font.Color = clWindowText
  1746.           Font.Height = -12
  1747.           Font.Name = 'MS Sans Serif'
  1748.           Font.Style = []
  1749.           ParentFont = False
  1750.         end
  1751.         object Label44: TLabel
  1752.           Left = 32
  1753.           Top = 90
  1754.           Width = 340
  1755.           Height = 13
  1756.           Caption = 
  1757.             'and the number of seconds to add to the timeout value after each' +
  1758.             ' failure'
  1759.           Font.Color = clWindowText
  1760.           Font.Height = -12
  1761.           Font.Name = 'MS Sans Serif'
  1762.           Font.Style = []
  1763.           ParentFont = False
  1764.         end
  1765.         object Label11: TLabel
  1766.           Left = 50
  1767.           Top = 114
  1768.           Width = 61
  1769.           Height = 13
  1770.           Caption = 'Min Timeout:'
  1771.           Font.Color = clWindowText
  1772.           Font.Height = -12
  1773.           Font.Name = 'MS Sans Serif'
  1774.           Font.Style = []
  1775.           ParentFont = False
  1776.         end
  1777.         object Label45: TLabel
  1778.           Left = 50
  1779.           Top = 138
  1780.           Width = 64
  1781.           Height = 13
  1782.           Caption = 'Max Timeout:'
  1783.           Font.Color = clWindowText
  1784.           Font.Height = -12
  1785.           Font.Name = 'MS Sans Serif'
  1786.           Font.Style = []
  1787.           ParentFont = False
  1788.         end
  1789.         object Label46: TLabel
  1790.           Left = 50
  1791.           Top = 162
  1792.           Width = 59
  1793.           Height = 13
  1794.           Caption = 'Timeout Inc:'
  1795.           Font.Color = clWindowText
  1796.           Font.Height = -12
  1797.           Font.Name = 'MS Sans Serif'
  1798.           Font.Style = []
  1799.           ParentFont = False
  1800.         end
  1801.         object Label47: TLabel
  1802.           Left = 224
  1803.           Top = 140
  1804.           Width = 158
  1805.           Height = 13
  1806.           Caption = 'All values are Integers in seconds'
  1807.           Font.Color = clWindowText
  1808.           Font.Height = -12
  1809.           Font.Name = 'MS Sans Serif'
  1810.           Font.Style = []
  1811.           ParentFont = False
  1812.         end
  1813.         object MinLookup: TSpinEdit
  1814.           Left = 128
  1815.           Top = 112
  1816.           Width = 81
  1817.           Height = 22
  1818.           Font.Color = clWindowText
  1819.           Font.Height = -11
  1820.           Font.Name = 'MS Sans Serif'
  1821.           Font.Style = []
  1822.           MaxValue = 50
  1823.           MinValue = 1
  1824.           ParentFont = False
  1825.           TabOrder = 0
  1826.           Value = 1
  1827.         end
  1828.         object MaxLookup: TSpinEdit
  1829.           Left = 128
  1830.           Top = 136
  1831.           Width = 81
  1832.           Height = 22
  1833.           Font.Color = clWindowText
  1834.           Font.Height = -11
  1835.           Font.Name = 'MS Sans Serif'
  1836.           Font.Style = []
  1837.           MaxValue = 99
  1838.           MinValue = 1
  1839.           ParentFont = False
  1840.           TabOrder = 1
  1841.           Value = 5
  1842.         end
  1843.         object LookupInc: TSpinEdit
  1844.           Left = 128
  1845.           Top = 160
  1846.           Width = 81
  1847.           Height = 22
  1848.           Font.Color = clWindowText
  1849.           Font.Height = -11
  1850.           Font.Name = 'MS Sans Serif'
  1851.           Font.Style = []
  1852.           MaxValue = 10
  1853.           MinValue = 1
  1854.           ParentFont = False
  1855.           TabOrder = 2
  1856.           Value = 1
  1857.         end
  1858.       end
  1859.       object GroupBox10: TGroupBox
  1860.         Left = 24
  1861.         Top = 216
  1862.         Width = 345
  1863.         Height = 121
  1864.         Caption = 'Other Connection settings'
  1865.         Font.Color = clWindowText
  1866.         Font.Height = -11
  1867.         Font.Name = 'MS Sans Serif'
  1868.         Font.Style = []
  1869.         ParentFont = False
  1870.         TabOrder = 2
  1871.         object Label16: TLabel
  1872.           Left = 32
  1873.           Top = 70
  1874.           Width = 79
  1875.           Height = 13
  1876.           Caption = 'Reconnect Time'
  1877.           Font.Color = clWindowText
  1878.           Font.Height = -12
  1879.           Font.Name = 'MS Sans Serif'
  1880.           Font.Style = []
  1881.           ParentFont = False
  1882.         end
  1883.         object Label28: TLabel
  1884.           Left = 32
  1885.           Top = 94
  1886.           Width = 77
  1887.           Height = 13
  1888.           Caption = 'Connect timeout'
  1889.           Font.Color = clWindowText
  1890.           Font.Height = -12
  1891.           Font.Name = 'MS Sans Serif'
  1892.           Font.Style = []
  1893.           ParentFont = False
  1894.         end
  1895.         object AutoRecon: TCheckBox
  1896.           Left = 32
  1897.           Top = 25
  1898.           Width = 105
  1899.           Height = 16
  1900.           Hint = '|Automatically try to reconnect when network connection is lost'
  1901.           Alignment = taLeftJustify
  1902.           Caption = 'Auto reconnect'
  1903.           Font.Color = clWindowText
  1904.           Font.Height = -12
  1905.           Font.Name = 'MS Sans Serif'
  1906.           Font.Style = []
  1907.           ParentFont = False
  1908.           TabOrder = 0
  1909.         end
  1910.         object Timer: TCheckBox
  1911.           Left = 32
  1912.           Top = 40
  1913.           Width = 105
  1914.           Height = 17
  1915.           Hint = '|Display the amount of time connected in the status bar'
  1916.           Alignment = taLeftJustify
  1917.           Caption = 'Connection Timer'
  1918.           Font.Color = clWindowText
  1919.           Font.Height = -12
  1920.           Font.Name = 'MS Sans Serif'
  1921.           Font.Style = []
  1922.           ParentFont = False
  1923.           TabOrder = 1
  1924.         end
  1925.         object ConnTime: TSpinEdit
  1926.           Left = 124
  1927.           Top = 67
  1928.           Width = 81
  1929.           Height = 22
  1930.           Hint = '|Seconds to wait before reconnecting'
  1931.           Font.Color = clWindowText
  1932.           Font.Height = -11
  1933.           Font.Name = 'MS Sans Serif'
  1934.           Font.Style = []
  1935.           MaxValue = 99
  1936.           MinValue = 10
  1937.           ParentFont = False
  1938.           TabOrder = 2
  1939.           Value = 10
  1940.         end
  1941.         object ConnTimer: TSpinEdit
  1942.           Left = 124
  1943.           Top = 91
  1944.           Width = 81
  1945.           Height = 22
  1946.           Hint = '|Seconds to try connecting before giving up'
  1947.           Font.Color = clWindowText
  1948.           Font.Height = -11
  1949.           Font.Name = 'MS Sans Serif'
  1950.           Font.Style = []
  1951.           MaxValue = 99
  1952.           MinValue = 1
  1953.           ParentFont = False
  1954.           TabOrder = 3
  1955.           Value = 5
  1956.         end
  1957.       end
  1958.     end
  1959.     object TTabPage
  1960.       Left = 4
  1961.       Top = 24
  1962.       Caption = 'Memory'
  1963.       object Image1: TImage
  1964.         Left = 304
  1965.         Top = 16
  1966.         Width = 32
  1967.         Height = 32
  1968.         AutoSize = True
  1969.       end
  1970.       object Label12: TLabel
  1971.         Left = 334
  1972.         Top = 24
  1973.         Width = 214
  1974.         Height = 13
  1975.         Caption = 'Click on a window to the left to display its size'
  1976.         Font.Color = clWindowText
  1977.         Font.Height = -12
  1978.         Font.Name = 'MS Sans Serif'
  1979.         Font.Style = []
  1980.         ParentFont = False
  1981.       end
  1982.       object Label13: TLabel
  1983.         Left = 344
  1984.         Top = 42
  1985.         Width = 25
  1986.         Height = 13
  1987.         Caption = 'Used'
  1988.         Font.Color = clWindowText
  1989.         Font.Height = -12
  1990.         Font.Name = 'MS Sans Serif'
  1991.         Font.Style = []
  1992.         ParentFont = False
  1993.       end
  1994.       object Label15: TLabel
  1995.         Left = 424
  1996.         Top = 42
  1997.         Width = 51
  1998.         Height = 13
  1999.         Caption = 'lines out of'
  2000.         Font.Color = clWindowText
  2001.         Font.Height = -12
  2002.         Font.Name = 'MS Sans Serif'
  2003.         Font.Style = []
  2004.         ParentFont = False
  2005.       end
  2006.       object Label33: TLabel
  2007.         Left = 8
  2008.         Top = 8
  2009.         Width = 131
  2010.         Height = 13
  2011.         Caption = 'Current windows in memory:'
  2012.         Font.Color = clWindowText
  2013.         Font.Height = -12
  2014.         Font.Name = 'MS Sans Serif'
  2015.         Font.Style = []
  2016.         ParentFont = False
  2017.       end
  2018.       object CurSize: TLabel
  2019.         Left = 378
  2020.         Top = 42
  2021.         Width = 3
  2022.         Height = 13
  2023.         Font.Color = clWindowText
  2024.         Font.Height = -11
  2025.         Font.Name = 'MS Sans Serif'
  2026.         Font.Style = []
  2027.         ParentFont = False
  2028.       end
  2029.       object MaxSize: TLabel
  2030.         Left = 486
  2031.         Top = 42
  2032.         Width = 3
  2033.         Height = 13
  2034.         Font.Color = clWindowText
  2035.         Font.Height = -11
  2036.         Font.Name = 'MS Sans Serif'
  2037.         Font.Style = []
  2038.         ParentFont = False
  2039.       end
  2040.       object Label17: TLabel
  2041.         Left = 334
  2042.         Top = 80
  2043.         Width = 124
  2044.         Height = 13
  2045.         Caption = 'Max lines in main windows'
  2046.         Font.Color = clWindowText
  2047.         Font.Height = -12
  2048.         Font.Name = 'MS Sans Serif'
  2049.         Font.Style = []
  2050.         ParentFont = False
  2051.       end
  2052.       object Label18: TLabel
  2053.         Left = 334
  2054.         Top = 104
  2055.         Width = 124
  2056.         Height = 13
  2057.         Caption = 'Max lines in child windows'
  2058.         Font.Color = clWindowText
  2059.         Font.Height = -12
  2060.         Font.Name = 'MS Sans Serif'
  2061.         Font.Style = []
  2062.         ParentFont = False
  2063.       end
  2064.       object Label19: TLabel
  2065.         Left = 334
  2066.         Top = 128
  2067.         Width = 114
  2068.         Height = 13
  2069.         Caption = 'Max lines in edit window'
  2070.         Font.Color = clWindowText
  2071.         Font.Height = -12
  2072.         Font.Name = 'MS Sans Serif'
  2073.         Font.Style = []
  2074.         ParentFont = False
  2075.       end
  2076.       object MemGrid: TDrawGrid
  2077.         Left = 8
  2078.         Top = 24
  2079.         Width = 289
  2080.         Height = 313
  2081.         TabStop = False
  2082.         ColCount = 2
  2083.         DefaultRowHeight = 17
  2084.         FixedCols = 0
  2085.         RowCount = 20
  2086.         FixedRows = 0
  2087.         Font.Color = clWindowText
  2088.         Font.Height = -12
  2089.         Font.Name = 'MS Sans Serif'
  2090.         Font.Style = []
  2091.         Options = [goRowSelect]
  2092.         ParentFont = False
  2093.         ScrollBars = ssVertical
  2094.         TabOrder = 0
  2095.         OnClick = MemGridClick
  2096.         OnDrawCell = MemGridDrawCell
  2097.         ColWidths = (
  2098.           82
  2099.           276)
  2100.       end
  2101.       object MemList: TListBox
  2102.         Left = 200
  2103.         Top = 192
  2104.         Width = 121
  2105.         Height = 97
  2106.         TabStop = False
  2107.         ItemHeight = 13
  2108.         Sorted = True
  2109.         TabOrder = 1
  2110.         Visible = False
  2111.       end
  2112.       object MainMax: TSpinEdit
  2113.         Left = 472
  2114.         Top = 78
  2115.         Width = 57
  2116.         Height = 22
  2117.         Font.Color = clWindowText
  2118.         Font.Height = -11
  2119.         Font.Name = 'MS Sans Serif'
  2120.         Font.Style = []
  2121.         MaxValue = 16384
  2122.         MinValue = 24
  2123.         ParentFont = False
  2124.         TabOrder = 2
  2125.         Value = 24
  2126.       end
  2127.       object ChildMax: TSpinEdit
  2128.         Left = 472
  2129.         Top = 102
  2130.         Width = 57
  2131.         Height = 22
  2132.         Font.Color = clWindowText
  2133.         Font.Height = -11
  2134.         Font.Name = 'MS Sans Serif'
  2135.         Font.Style = []
  2136.         MaxValue = 16384
  2137.         MinValue = 24
  2138.         ParentFont = False
  2139.         TabOrder = 3
  2140.         Value = 24
  2141.       end
  2142.       object EditMax: TSpinEdit
  2143.         Left = 472
  2144.         Top = 126
  2145.         Width = 57
  2146.         Height = 22
  2147.         Font.Color = clWindowText
  2148.         Font.Height = -11
  2149.         Font.Name = 'MS Sans Serif'
  2150.         Font.Style = []
  2151.         MaxValue = 16384
  2152.         MinValue = 24
  2153.         ParentFont = False
  2154.         TabOrder = 4
  2155.         Value = 24
  2156.       end
  2157.     end
  2158.   end
  2159.   object OKBtn: TBitBtn
  2160.     Left = 320
  2161.     Top = 408
  2162.     Width = 77
  2163.     Height = 27
  2164.     Font.Color = clBtnText
  2165.     Font.Height = -12
  2166.     Font.Name = 'MS Sans Serif'
  2167.     Font.Style = []
  2168.     ParentFont = False
  2169.     TabOrder = 1
  2170.     OnClick = OKBtnClick
  2171.     Kind = bkOK
  2172.     Margin = 2
  2173.     Spacing = -1
  2174.   end
  2175.   object CancelBtn: TBitBtn
  2176.     Left = 400
  2177.     Top = 408
  2178.     Width = 77
  2179.     Height = 27
  2180.     Font.Color = clBtnText
  2181.     Font.Height = -12
  2182.     Font.Name = 'MS Sans Serif'
  2183.     Font.Style = []
  2184.     ParentFont = False
  2185.     TabOrder = 2
  2186.     OnClick = CancelBtnClick
  2187.     Kind = bkCancel
  2188.     Margin = 2
  2189.     Spacing = -1
  2190.   end
  2191.   object BitBtn1: TBitBtn
  2192.     Left = 480
  2193.     Top = 408
  2194.     Width = 77
  2195.     Height = 27
  2196.     HelpContext = 101
  2197.     Font.Color = clBtnText
  2198.     Font.Height = -12
  2199.     Font.Name = 'MS Sans Serif'
  2200.     Font.Style = []
  2201.     ParentFont = False
  2202.     TabOrder = 3
  2203.     Kind = bkHelp
  2204.   end
  2205.   object HelpPanel: TPanel
  2206.     Left = 0
  2207.     Top = 442
  2208.     Width = 584
  2209.     Height = 20
  2210.     Align = alBottom
  2211.     Alignment = taLeftJustify
  2212.     BevelOuter = bvLowered
  2213.     Font.Color = clWindowText
  2214.     Font.Height = -11
  2215.     Font.Name = 'MS Sans Serif'
  2216.     Font.Style = []
  2217.     ParentFont = False
  2218.     TabOrder = 4
  2219.   end
  2220. end
  2221.